home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Almathera Ten Pack 3: CDPD 3
/
Almathera Ten on Ten - Disc 3: CDPD3.iso
/
scope
/
051-075
/
scopedisk66
/
qrt15
/
inputs
/
building.qrt
< prev
next >
Wrap
Text File
|
1995-03-19
|
8KB
|
315 lines
{ *************************************************************
"BUILDING.QRT" - two modern high-rise office buildings,
with a road between them.
Rendered by QRT 1.5 on an HP 9000/370
Steve Koren, 14 Mar 89
Image requires version 1.5 or later due to TRIANGLE()
bug in 1.1 -> 1.4.
************************************************************* }
FILE_NAME = Building.RAW
{ ********* Some pattern definitions ********** }
PATTERN ( x_size = 60, { ** Checkered pattern ** }
y_size = 60,
name = CHECK,
RECTANGLE (
start_x = 0,
start_y = 0,
end_x = 30,
end_y = 30,
diff = (.1,1.0,.1),
)
RECTANGLE (
start_x = 30,
start_y = 30,
end_x = 60,
end_y = 60,
diff = (.1,1.0,.1),
)
)
PATTERN ( x_size = 10,
y_size = 15,
name = BUILDING_SIDE,
RECTANGLE (
start_x = 1, start_y = 1,
end_x = 9, end_y = 14
diff = (.2, .2, .2),
mirror = (.75, .75, .75)
)
)
PATTERN ( x_size = 10,
y_size = 15,
name = BUILDING_STRIPE
RECTANGLE (
start_x = 0, start_y = 3,
end_x = 10, end_y = 12;
diff = (.2, .2, .2),
mirror = (.65, .65, .65)
)
)
{ **************** SIDE ONE ******************* }
BEGIN_BBOX
BEGIN_BBOX
PARALLELOGRAM ( loc = (100, 0, 0),
v1 = (0, 0, 70),
v2 = (0, 60, 0)
diff = (.4, .4, .4)
pattern= BUILDING_SIDE
)
TRIANGLE ( loc = (100, 60, 0),
v1 = (0, 0, 70),
v2 = (62, 0, 35)
diff = (.2, .2, .7)
)
PARALLELOGRAM ( loc = (100, 60, 0),
v1 = (62, 0, 35),
v2 = (0, 60, 0)
diff = (.4, .4, .4)
pattern= BUILDING_SIDE
)
{ **************** SIDE TWO ******************* }
PARALLELOGRAM ( loc = (100, 0, 0),
v1 = (62, 0, -35),
v2 = (0, 120, 0)
diff = (.4, .4, .4)
pattern= BUILDING_SIDE
)
TRIANGLE ( loc = (100, 120, 0),
v1 = (62, 0, 35),
v2 = (62, 0, -35)
diff = (.2, .2, .7)
)
END_BBOX
BEGIN_BBOX
PARALLELOGRAM ( loc = (162, 120, -35)
v1 = (0, 0, 70),
v2 = (0, 60, 0),
diff = (.4, .4, .4)
pattern= BUILDING_SIDE
)
{ **************** SIDE THREE ******************* }
PARALLELOGRAM ( loc = (162, 0, -35),
v1 = (62, 0, 35),
v2 = (0, 180, 0)
diff = (.4, .4, .4)
pattern= BUILDING_SIDE
)
TRIANGLE ( loc = (162, 180, -35),
v1 = (0, 0, 70),
v2 = (62, 0, 35)
diff = (.2, .2, .7)
)
PARALLELOGRAM ( loc = (224, 180, 0)
v1 = (-62, 0, 35),
v2 = (0, 60, 0),
diff = (.4, .4, .4)
pattern= BUILDING_SIDE
)
END_BBOX
{ **************** SIDE FOUR ******************* }
BEGIN_BBOX
PARALLELOGRAM ( loc = (224, 0, 0),
v1 = (0, 0, 70),
v2 = (0, 240, 0)
diff = (.4, .4, .4)
pattern= BUILDING_SIDE
)
TRIANGLE ( loc = (224, 240, 0)
v1 = (0,0, 70),
v2 = (-62, 0, 35)
diff = (.2, .2, .7)
)
PARALLELOGRAM ( loc = (224, 240, 70)
v1 = (-62, 0, -35),
v2 = (0, 60, 0),
diff = (.4, .4, .4)
pattern= BUILDING_SIDE
)
{ **************** SIDE FIVE ******************* }
PARALLELOGRAM ( loc = (224, 0, 70),
v1 = (-62, 0, 35),
v2 = (0, 300, 0)
diff = (.4, .4, .4)
pattern= BUILDING_SIDE
)
TRIANGLE ( loc = (224, 300, 70),
v1 = (-62, 0, 35),
v2 = (-62, 0, -35)
diff = (.2, .2, .7)
)
END_BBOX
BEGIN_BBOX
PARALLELOGRAM ( loc = (162, 300, 105)
v1 = (0, 0, -70),
v2 = (0, 60, 0),
diff = (.4, .4, .4)
pattern= BUILDING_SIDE
)
{ **************** SIDE SIX ******************* }
PARALLELOGRAM ( loc = (100, 0, 70),
v1 = (62, 0, 35),
v2 = (0, 360, 0)
diff = (.4, .4, .4)
pattern= BUILDING_SIDE
)
TRIANGLE ( loc = (100, 360, 70),
v1 = (62, 0, 35),
v2 = (62, 0, -35)
diff = (.2, .2, .7)
)
PARALLELOGRAM ( loc = (100, 60, 70)
v1 = (62, 0, -35),
v2 = (0, 300, 0),
diff = (.4, .4, .4)
pattern= BUILDING_SIDE
)
END_BBOX
END_BBOX
{ ******** PYRAMID shaped building ********** }
BEGIN_BBOX
TRIANGLE ( loc = (120, 0, 200),
v1 = (0, 0, 100),
v2 = (43, 250, 50),
diff = (.6, .2, .2),
pattern= BUILDING_STRIPE
)
TRIANGLE ( loc = (120, 0, 200),
v1 = (86, 0, 50),
v2 = (43, 250, 50),
diff = (.6, .2, .2),
pattern= BUILDING_STRIPE
)
TRIANGLE ( loc = (120, 0, 300),
v1 = (86, 0, -50),
v2 = (43, 250, -50),
diff = (.6, .2, .2),
pattern= BUILDING_STRIPE
)
END_BBOX
{ **** THE GROUND AND SOME ROADS *** }
BEGIN_BBOX
PARALLELOGRAM ( loc = (60, .01, -500)
v1 = (20, 0, 0)
v2 = (0, 0, 1000)
diff = (.4, .4, .4)
)
PARALLELOGRAM ( loc = (-150, .01, 150)
v1 = (500, 0, 0)
v2 = (0, 0, 20)
diff = (.4, .4, .4)
)
END_BBOX
{ ** Ground - try a big spherical one for effect ** }
SPHERE ( loc = (100, -5000, 0),
radius = 5000,
diff = (.8, .8, 0),
pattern= CHECK,
xmult = 2.5,
ymult = 2.5
)
{
PARALLELOGRAM ( loc = ( -3000, 0, -3000), { ** big! ** }
v1 = (6000, 0, 0),
v2 = ( 0, 0, 6000),
diff = ( .8, .8, 0),
pattern = CHECK
xmult = 2
ymult = 2
)
}
{ ** An observer ** }
OBSERVER ( loc = (-200, 400, -80)
lookat = (150, 150, 90)
)
{ ** Lights (but not Bud lights) ** }
LAMP ( loc = (30, 540, 60),
radius = 5,
dist = 300
)
LAMP ( loc = (240, 400, -5),
radius = 5,
dist = 200
)
SKY ( horiz = (.3, .3, .75),
zenith = (.1, .1, .60),
dither = 4
)
DEFAULT ( x_res = 320
y_res = 400
aspect= .56
)
FOC_LENGTH = 65